home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mesolore
/
Mesolore - Disc 1.iso
/
pc
/
data
/
Selden Search.dir
/
00009_Script_9
< prev
next >
Wrap
Text File
|
2001-03-05
|
466b
|
18 lines
on mouseUp
put "" into field "output"
put "" into temp
DropListData = ""
DropListData = sendAllSprites (#DropList_Selection, [:])
repeat with x in DropListData
set holder = the text of x
if holder <> "" then
repeat while the last char of holder = " "
delete the last char of holder
end repeat
put holder & "," after temp
end if
end repeat
delete the last char of temp
search temp
put temp
end